(comint-simple-send): Fix previous change.

diff --git a/lisp/comint.el b/lisp/comint.el
index 472b6400eb1938b1bcedd41ca5d8aea54eccc14c..30a94ba71a8ba036d74b028ae57533c82d14f39c 100644 (file)
--- a/lisp/comint.el
+++ b/lisp/comint.el
@@ -1850,7 +1850,7 @@ This just sends STRING plus a newline. To override this,
 set the hook `comint-input-sender'."
   (comint-send-string proc string)
   (if comint-input-sender-no-newline
-      (if (not (string-equal input ""))
+      (if (not (string-equal string ""))
          (process-send-eof))
     (comint-send-string proc "\n")))